Imports Microsoft.VisualBasic

Public Class Actividad

    Private _Id As Integer
    Private _Nombre As String
    Private _Descripcion As String

    Public Sub New(ByVal id As Integer, ByVal nombre As String, ByVal descripcion As String)
        Me._Id = id
        Me._Nombre = nombre
        Me._Descripcion = descripcion
    End Sub

    Public Property id() As Integer
        Get
            Return _Id
        End Get

        Set(ByVal value As Integer)
            _Id = value
        End Set
    End Property

    Public Property nombre() As String
        Get
            Return _Nombre
        End Get

        Set(ByVal value As String)
            _Nombre = value
        End Set
    End Property

    Public Property descripcion() As String
        Get
            Return _Descripcion
        End Get

        Set(ByVal value As String)
            _Descripcion = value
        End Set
    End Property

End Class
